namespace eval ::Trinkets {
	StartTCL::Provide
}

 proc ::Trinkets::SixDemonBag { to from } {
	set spell_list "14642 15117 15534 21402 23102 23103 "
	set spellid [lindex $spell_list [expr {int(rand()*[llength $spell_list])}]]
	::CastSpell $from $to $spellid
 }

 proc ::Trinkets::PiccoloOfTheFlamingFire { to from } {
	::Emote $to 10
 }




proc ::Trinkets::Init { } {
	if { [ info exists "::StartTCL::VERSION" ] } {
		::Custom::AddLegacySpellScript {
			14537 { ::Trinkets::SixDemonBag $to $from }
			17512 { ::Trinkets::PiccoloOfTheFlamingFire $to $from }
		}
	} else {
		
	}
}

::Trinkets::Init
